home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 5 / Amiga Plus Sonderheft 1996 #5.iso / programme / raystrom_v1.2 / 68020 / arexx / default.ray next >
Text File  |  1987-01-19  |  331b  |  24 lines
  1. /***************
  2.  * NAME:        ??
  3.  * DESCRIPTION: ??
  4.  ***************/
  5.  
  6. signal on error
  7.  
  8. options results
  9.  
  10. IF ~show('P','RAYSTORM') THEN DO
  11.     address COMMAND 'run >NIL: <NIL: /RayStorm'
  12.     address COMMAND WaitForPort RAYSTORM
  13. END  
  14.  
  15. address RAYSTORM
  16.  
  17. exit 0
  18.  
  19. error:
  20. say "Error" rc "in line" sigl ":"
  21. GETERRORSTR rc
  22. say result
  23. exit 0
  24.